﻿
Partial Class WebForm_QueryTrainingRegister
    Inherits System.Web.UI.UserControl

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

#Region "Delegate"

    Public Event SelectedIndexChanged(ByVal source As Object, ByVal e As EventArgs)

    Protected Sub GV_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles GV.SelectedIndexChanged
        RaiseEvent SelectedIndexChanged(Me, New EventArgs)
    End Sub

#End Region

End Class

Partial Class WebForm_QueryTrainingRegister

    Public Sub InitData()

        ObjectDataSource1.SelectParameters("LoginUser").DefaultValue = Page.User.Identity.Name
        GV.DataSourceID = ObjectDataSource1.ID
        GV.DataBind()

    End Sub

#Region "Property"

    Public ReadOnly Property SelectedGroupID() As String
        Get
            If Me.GV.SelectedRow Is Nothing Then
                Return 0
            Else
                Return Me.GV.DataKeys(Me.GV.SelectedIndex).Values(0)
            End If

        End Get
    End Property

#End Region


End Class
